home *** CD-ROM | disk | FTP | other *** search
/ Haight-Ashbury in the Sixties / Haight-Ashbury in the Sixties (1996)(Rockument)(Disc 1 of 2)[Mac-PC].iso / mac / MAIN / TUNEIN / TUNEIN01.DIR / 00250_Script_250 < prev    next >
Text File  |  1995-06-01  |  507b  |  18 lines
  1. on mouseDown
  2.   global lastCredits, thisLine, thisCatalog
  3.   set thisLine = the mouseLine
  4.   if thisLine = -1 then
  5.     exit
  6.   end if
  7.   if line thisLine of field "credits/resource catalog"  = "" then
  8.     beep
  9.     exit
  10.   else
  11.     hilite line thisLine of field "credits/resource catalog"  
  12.     puppetSound "add a movie"
  13.     updatestage
  14.     set thisCatalog = line thisLine of field "credits/resource catalog"
  15.     set the text of cast "resource catalog" = the text of cast thisCatalog
  16.   end if
  17. end
  18.